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FIG. 9A 

/* Includes required */ 
#include <GL/gl.h> 
#include <GL/glut.h> 
# include <stdio . h> 
#include <ppm.h> 
#include <math.h> 



I * * 

* something because of windows 
*/ 

void eprintf () { 

} 



J *k * 

* our data structure of choice 
*/ 

typedef struct obj { 

/* other parameters */ 
float matrix [16]; 



/* view angle */ 
float viewangle; 



/* aspect ratio */ 
float aspect ; 

/* z of the camera */ 
float tz; 

/* ry of the camera */ 
float ry; 
} Obj; 



/* hold the display lists for textures 
typedef struct texture { 

int texl; 

int tex2; 
} Texture; 

I ~k -k 

* our global variables 
V 

/* camera settings */ 
Obj scene; 
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/* texture stuff */ 
Texture def; 

Texture* current_texture = &def; 

/* track the next display list number */ 
int nextDLnum = 2; 

/* stuff for lighting */ 

float lightPos[4] = {2.0, 4.0, 2.0, 0}; 
float lightDir[4] - {0, 0, 1.0, 1.0}; 
float lightAmb[4] = {0.4, 0.4, 0.4, 1.0}; 
float lightDiff [4] - {0.8, 0.8, 0.8, 1.0}; 
float lightSpec[4] = {0.8, 0.8, 0.8, 1.0}; 
int lights = 0; 
int outsideView = 0; 
int parent; 



#define HEMISPHERE 1 

void createHemisphere (int listNum, int numPts, int geom) ; 
/ * * 

* Read in the ppm files and create display lists for a texture 

* returns the dimension of the image 
*/ 

pixel **mapl, **map2; 

GLubyte *texl, *tex2, **tmpPP, *tmpP; 

void readTexture (Texture* t, char^ filel, char* file2) { 
FILE *fpl, *fp2; 
int cols, rows, i, j, index; 
pixval maxval; 

/* open the files */ 
fpl - fopen (filel, "r") ; 
fp2 = fopen (file2, "r"); 
if (IfpD { 

fprintf (stderr, "Couldn't open %s\n", filel); 

} 

if (!fp2) { 

fprintf (stderr , "Couldn't open %s\n", file2); 

} 

/* read the ppm files */ 

mapl = ppm_readppm(fpl / &cols, &rows, &maxval); 

fprintf (stderr, "%s: rows = %d \t cols = %d\n", filel, rows, 

cols, maxval) ; 

map2 = ppm_readppm ( f p2 , &cols, &rows, &maxval); 
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fprintf (stderr, "%s: rows = %d \t cols = %d\ 
cols f maxval) ; 



/* convert them */ 
texl = malloc (sizeof (GLubyte) 
tex2 = malloc (sizeof (GLubyte) 
index — 0; 

for (i = 0; i < rows; i++) { 
for (j = 0; j < cols; j++) { 
/* R */ 
texl [index] 
tex2 [index] 
index ++; 



rows 
rows 



PPM_GETR (mapl [ i ] [j] 
PPM GETR (map2 [i] [ j ] 



cols 
cols 



/* G */ 
texl [index] 
tex2 [index] 
index ++; 



PPM_GETG (mapl [i] [ j ] 
PPM GETG (map2 [i] [ j ] 



/* B */ 
texl [ index] 
tex2 [ index] 
index ++; 



PPM_GETB (mapl [i] [ j ] 
PPM GETB (map2 [i] [ j ] 



/* create the textures */ 

/* new display list*/ 

glNewList (nextDLnum, GL_COMPILE) ; 

t->texl = nextDLnum; 

nextDLnum++; 

glTexImage2D (GL__TEXTURE_2D, 0, 3, cols, rows 
GL_UN S I GNE D_B YTE , 

texl ) ; 
glEndList ( } ; 

/* new display list*/ 

glNewList (nextDLnum, GL_COMPILE) ; 

t->tex2 = nextDLnum; 

nextDLnum++; 

glTexImage2D ( GL_TEXTURE_2D, 0, 3, cols, rows 
GL_UNSIGNED_BYTE' 

tex2 ) ; 
glEndList ( ) ; 



FIG. 9D 



/ * * 

* this will initialize the display lists for the objects 
*/ 

void initialize_obj ects (int argc, char**argv) { 
float tmp [4] ; 

/* read in the texture */ 
readTexture (&def , argv[l] , argv[2] ) ; 

/* create hemisphere */ 

createHemisphere (1, 50, GL_TRIANGLE_STRf P) ; 
/* scene */ 

scene . viewangle = 130; 
scene. tz = 0; 
scene. ry = 0; 

} 

/* 

* Clear the screen, draw the objects 
V 

void display () 
{ 

float tmp [4] ; 
float height; 

/* clear the screen */ 

glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT) ; 

/* adjust for scene orientation */ 
glMatrixMode ( GL_PR0 JECTION) ; 
if (outsideView) { 
glLoadldentity ( ) ; 

gluPerspective (45 , scene . aspect , 0.1, 10.0); 
glTranslatef (0, 0, -3); 
glRotatef (45, 1, 0, 0) ; 
glRotatef (45, 0, 1, 0); 
glDisable (GL_TEXTURE_2D) ; 
glColor3f ( . 8, .8, .8); 
} else { 
glLoadldentity ( ) ; 

gluPerspective (scene . viewangle, scene . aspect , 0.1, 10 . 
glTranslatef (0, 0, scene. tz); 
glRotatef ( scene . ry, 0, 1, 0); 

} 
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/* draw our models */ 
glMatrixMode (GL_MODELVIEW) ; 
glPushMatrix { ) ; 

if (outsideView) { 
/* transform to where the camera would be */ 
glPushMatrix ( ) ; 

/* draw a cube for the camera */ 
glLoadldentity ( ) ; 
glRotatef (180, 1, 0, 0); 
glTranslatef { 0 , 0, scene. tz); 
tmp [ 0 ] = tmp [ 1 ] = tmp [ 2 ] = . 8 ; 
tmp[3] = 1; 

glMaterialf v{GLJFRONT_AND_BACK, GLJSPECULAR, tmp) ; 
glMaterialf ( GL_FRONT_AND_BACK, GL_SHININESS , 0.0) ; 
glMaterialf v (GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, tmp) 
glutSolidCube ( . 1 ) ; 

/* draw a cone for the view frustrum */ 

glLoadldentity ( ) ; 

height = 1 - scene. tz; 

glRotatef (45, 0, 0, 1); 

glTranslatef (0, 0, -1); 

tmp [ 0 ] = tmp [ 1 ] = 1/ 

tmp[2] = 0; 

tmp [ 3 ] = . 3 ; 

glMaterialf v (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf ( GL_FRONT__AND_BACK , GL__SHININESS, 0.0); 
glMaterialf v (GL_FRONT_AND_BACK, GL_AMBIENT__AND_DI FFUSE , tmp) 
glutSolidCone (tan (scene. viewangle * 3.14 / 360.0) * height, 
height, 20, 1); 

glPopMatrix ( ) ; 

glEnable (GL_TEXTURE_2D) ; 

} 

/* now draw the semisphere */ 
if (lights) { 

tmp [ 0 ] = tmp [ 1 ] = tmp [2] = .8; 

tmp [ 3 ] = . 8 ; 

glMaterialf v (GL_FRONT_AND_BACK, GLJSPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND__BACK, GL_SHININESS , 10.0) ; 
glMaterialfv (GL_FRONT__AND_BACK, GL_AMBIENT_AND_DI FFUSE , tmp) 

} 

glCallList (current_texture->texl ) ; 
glCallList (HEMISPHERE) ; 
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if (lights) { 
tmp[0] - tmp[l] - tmp[2] = .5; 
tmp [ 3 ] = . 5 ; 

glMaterialfv (GL_FRONT_AND_BACK, GL_SPECULAR, tmp) ; 
glMaterialf (GL_FRONT_AND_BACK, GL_SHININESS , 10.0) ; 
glMaterialfv (GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE , tmp) ; 

} 

glRotatef (180.0, 0.0, 0.0, 1.0); 

glCallList ( current_texture->tex2 ) ; 
glCallList (HEMISPHERE) ; 
glPopMatrix ( ) ; 

fprintf (stderr, "%s\n", gluErrorString (glGetError ( ) ) ) ; 
glutSwapBuf f ers () ; 

} 

/* 

* Handle Menus 
*/ 

#define M_QUIT 1 

void Select (int value) 

{ 

switch (value) { 
case M_QUIT: 

exit (0) ; 

break; 

} 

glutPos tRedisplay ( ) ; 

} 

void create_menu ( ) { 

f print f ( stderr , "Press ? for help\n"); 
glutCreateMenu (Select) ; 
glutAddMenuEntry ("Quit", M_QUIT) ; 
glutAttachMenu (GLUT_RIGHT_BUTTON) ; 

} 



/* Initializes hading model */ 
void mylnit(void) 

{ 

glEnable ( GL__DEPTH_TEST ) ; 
glShadeModel (GL_SMOOTH) ; 

/* texture stuff */ 

glPixelStorei ( GL_UNPACK_AL I GNMENT , sizeof (GLubyte) ) ; 
glTexParameterf (GL_TEXTURE_2D, GL__TEXTURE_WRAP__S , GL_CLAMP) ; 
glTexParameterf (GL__TEXTURE_2D, GL_TEXTURE WRAP T, GL CLAMP); 
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glTexParameterf (GL_TEXTURE_2D, GLJTEXTURE_MAG_FILTER, 
GL_NEAREST) ; 

glTexParameterf ( GL_TEXTURE__2 D , GL_TEXTURE_MIN_FILTER, 
GL_NEAREST) ; 

glTexEnvf (GL_TEXTURE_ENV, GL__TEXTURE_ENV_MODE , GL_DECAL) ; 
glEnable ( GL__TEXTURE__2 D ) ; 

} 

/* 

* Called when the window is first opened and whenever 

* the window is reconfigured (moved or resized) . 
*/ 

void myReshape (int w, int h) 
{ 

glViewport (0, 0, w, h) ; /* define the viewport */ 

scene. aspect = 1 . 0* (GLf loat ) w/ (GLf loat ) h; 
glMatrixMode (GL_PROJECT10N) ; 
glLoadldentity ( ) ; 

gluPerspective ( scene . viewangle, scene . aspect, 0.1, 10.0); 
glMultMatrixf (scene .matrix) ; 

glMatrixMode (GL__MODELVIEW) ; /* back to modelview 

matriix */ 

} 

/* 

* Keyboard handler 

*/ 
void 

Key (unsigned char key, int x, int y) 

{ 

float matrix [16] ; 
glMatrixMode ( GL_MODELVIEW) ; 

glGet Float v ( GL_MODELVIEW_MATRIX, matrix) ; 
glLoadldentity ( ) ; 

fprintf (stderr, "%d - %c ", key, key); 
switch (key) { 
case 1 o 1 : 
if ( ! out sideView) { 

fprintf ( stderr, "outside on "); 
out sideView - 1 ; 

/* turn on blending */ 
glEnable (GL_BLEND) ; 

glBlendFunc ( GL_S RC_AL PHA , GLJDNE_MINUS_SRC__ALPHA) ; 
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/* We want to see color */ 

glTexEnvf (GL__TEXTURE_ENV, GL_TEXTURE_ENV_MODE , GL__MODULATE ] 

/* turn on our spotlight */ 
glEnable (GL_LIGHT1) ; 

glLightf v(GL_LIGHTl, GL_AMBIENT , lightAmb) ; 
glLightf v (GL_LIGHT1 , GLJDIFFUSE, lightDiff ) ; 
glLightfv(GL_LIGHTl, GL_SPECULAR, lightSpec) ; 
glLightf v (GL_LIGHT1 , GL_SPOT_DIRECTION, lightDir) ; 
} else { 

fprintf (stclerr, "outside off "); 
outsideView = 0; 

glTexEnvf ( GL__TEXTURE__ENV, GL_TEXTURE__EN V_MODE , GL_DECAL) ; 
glDisable (GL_BLEND) ; 

} 

break; 
ase ' F f : 

fprintf (stderr, "flat ") ; 
glShadeModel (GL_FLAT) ; 
break; 
:ase 1 f 1 : 

fprintf (stderr , "smooth "); 
glShadeModel (GL_SMOOTH) ; 
break; 
:ase 1 y 1 : 

printf("ry = %f\n", scene.ry); 
scene. ry -= 5; 
break; 
:ase ' Y ! : 
scene.ry += 5; 
break; 
;ase 1 z 1 : 
scene. tz -= .02; 

fprintf (stderr, " tz = %f ", scene. tz); 
break; 
;ase 1 Z ' : 
scene. tz += .02; 

fprintf (stderr, " tz = %f ", scene. tz); 
break; 
;ase 1 a 1 : 

scene . viewangle -= 1; 

fprintf (stderr, " angle: %f " , scene . viewangle ) ; 
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break; 
case 'A* : 
scene . viewangle += 1; 

fprintf (stderr, "angle: %f ", scene . viewangle ) ; 

break; 
case 55: 

glRotatef (-5, 0.0, 0.0, 1.0); 

break; 
case 57 : 

glRotatef (5, 0.0, 0.0, 1.0); 

break; 
case 52: 

glRotatef (-5, 0.0, 1.0, 0.0); 

break; 
case 54 : 

glRotatef (5, 0.0, 1.0, 0.0); 

break; 
case 56: 

glRotatef (5, 1.0, 0.0, 0.0); 

break; 
case 50: 

glRotatef (-5, 1.0, 0.0, 0.0); 

break; 
case 1 q 1 : 

if (lights) { 

glDisable (GL_LIGHT0) ; 
glDisable (GL_LIGHTING) ; 
lights = 0; 

fprintf (stderr, "no lights "); 
} else { 

glEnable ( GL_LIGHT ING ) ; 
glEnable (GL__LIGHT0 ) ; 

glLightf v ( GL_LIGHT0 , GL_POSITION, lightPos) 
glLightfv (GL_LIGHT0, GL_AMBIENT, lightAmb) ; 
glLightfv (GL_LIGHT0, GL_D1FFUSE, lightDiff) 
glLightfv (GL_LIGHT0 , GL_SPECULAR, lightSpec 
lights = 1; 

fprintf (stderr, "lights "); 

} 

break; 
case ' t 1 : 

fprintf (stderr, "texture off "); 

glDisable (GL_TEXTURE_2D) ; 

break; 
case ' T 1 : 

fprintf (stderr, "texture on "); 

glEnable (GL_TEXTURE_2D) ; 

break; 
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case 1 ? ' : 

fprintf ( stderr , "hjkl - rotate current object\n ,r ); 
fprintf ( stderr, "s/S - shrink / grow the object or zoom the 
scene\n" ) ; 

fprintf (stderr, "a/A viewangle\n" ) ; 
fprintf { stderr , "z/Z camera position\n" ) ; 
fprintf (stderr, "f/F flat sraooth\n"); 
fprintf (stderr , "Escape quits \n"); 
break; 

case 27: /* Esc will quit */ 

exit ( 1 ) ; 

break; 
default : 

fprintf (stderr , "Unbound key - %d " , key) ; 
break; 

} 

fprintf (stderr, "\n") ; 
glMultMatrixf (matrix) ; 
glutPos tRedisplay ( ) ; 



/* 

* Main Loop 

* Open window with initial window size, title bar, 

* RGBA display mode, and handle input events. 
*/ 

int main{int argc, char** argv) 
{ 

glutlnit (&argc, argv) ; 

glutlnitDisplayMode (GLUT_DOUBLE | GLUT_RGBA) ; 
parent = glutCreateWindow (argv[0]); 
mylnit ( ) ; 

glutKeyboardFunc (Key) ; 
glutReshapeFunc (myReshape) ; 
glutDisplayFunc (display ) ; 
create_menu ( ) ; 

initialize__ob j ects (argc, argv) ; 
glutMainLoop ( ) ; 

} 
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#ifdef WINDOWS 
#include <windows . h> 
#endif 

#include <GL/gl.h> 
#include <GL/glut.h> 

# include "warp . h" 
# include <stdio . h> 

j -k * 

* Triangulate a hemisphere and texture coordinates. 

* listNum - display list number 

* numPts - number of points to a side 

* return the display list 
*/ 

void createHemisphere (int listNum, int numPts, int geom) { 
double incr = 1.0 / numPts; 
double u, v, x, y, z; 
float tx, tz; 
int i, j; 

/* start the display list */ 

glNewList (listNum, GL_COMPILE_AND_EXECUTE) ; 

/* create the coordinates */ 

/* use the square to circle map */ 

/* across then down */ 

v = 0; 

for (j = 0; j < numPts ; j++) { 
/* start the tri strip */ 
glBegin (geom) ; 
u = 0; 

for (i = 0; i <= numPts; i++) { 
/* do the top point */ 
/* get the XYZ coords */ 
map (u, v, &x, &y, &z); 

/* create the texture coord */ 
tx = x / 2 + . 5; 
tz=z/2+.5; 

if (tx > 1.0 ii tz > 1.0 M tx < 0.0 M tz < 0.0) { 
printf("not in range %f %f\n", tx, tz) ; 

} 

glTexCoord2f (tx, tz) ; 
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/* normal */ 
glNorma!3f (x, y, z); 

/* create the coord */ 
glVertex3f (x, y, z) ; 

/* get the XYZ coords */ 
map(u, v + incr, &x, &y, &z> ' 

/* create the texture coord */ 
tx = x / 2 + .5; 

" ° t K>1.0 u'«>1.0 M tx<0.0 II tz<0.0) . 

printfTnot in range %f %f\n", tx, tz); 

} 

glTexCoord2f (tx, tz) ; 

/* normal */ 
glNormal3f (x, y, z) ; 

/* create the coord */ 
glVertex3f (x, y, z) ; 

/* adjust u */ 
u += incr; 

/* done with the list / 
glEndO ; 

/* adjust v */ 
v += incr; 

} 

/* all done with the list */ 
glEndList ( ) ; 



